18.06.2020

Überblick Bikesharing Daten
Nutzerzahlen Pro Monat
Nutzerzahlen Pro Monat Nach Geschlecht
Durchschnittliche Nutzeranzahl Pro Stunde
Durchschnittliche Nutzeranzahl Pro Stunde Nach Abonnement
Durchschnittliches Alter Der Nutzer Pro Stunde
Nutzeranzahl Je Durchschnittstemperatur
Überblick Datengrundlage Stündliche Analyse
hourly_lstm <- fit_lstm(X = hourly.X.train, y = hourly.Y.train,
timesteps = hourly.ann.timesteps,
validation_split = 0.05,
epochs = hourly.ann.epochs,
batchsize = c(NA,hourly.ann.batchsize),
#k.fold = 3, k.optimizer = "min",
hidden = data.frame(c(50,25),c("tanh")),
dropout = c(0.5,0.1),
output_activation = "linear",
stateful = F, return_sequences = T,
loss = "mean_squared_error",
optimizer = "Ftrl",
metrics = c('mean_absolute_error'))
lstm <- fit_lstm(X = X.train, y = Y.train,
timesteps = ann.timesteps,
validation_split = 0.05,
epochs = ann.epochs,
batchsize = c(NA,ann.batchsize),
k.fold = 3, k.optimizer = "min",
hidden = data.frame(c(50,25),c("tanh")),
dropout = c(0.5,0.1),
output_activation = "linear",
stateful = F, return_sequences = T,
loss = "mean_squared_error",
optimizer = "Ftrl",
metrics = c('mean_absolute_error'))